knitr::opts_chunk$set(warning = FALSE, message = FALSE)
source('utils.R')
plot_distance_N(df_dim,t = 5000,f_empty_topics = TRUE,comparison_group = 'pairs',distance_formula = 'cosine', plotly = TRUE)
plot_distance_N(df_dim,t = 5000,f_empty_topics = TRUE,comparison_group = 'pairs',distance_formula = 'kullback-leibler', plotly = TRUE)
plot_distance_N(df_dim,t = 5000,f_empty_topics = TRUE,comparison_group = 'diff',distance_formula = 'cosine', plotly = TRUE)
plot_distance_N(df_dim,t = 5000,f_empty_topics = TRUE,comparison_group = 'diff',distance_formula = 'kullback-leibler', plotly = TRUE)
plot_distance_prop(df_dim,t = 5000,f_empty_topics = TRUE,distance_formula = 'kullback-leibler', plotly = TRUE,
regions = FALSE)
LS0tCnRpdGxlOiAiUiBOb3RlYm9vayIKb3V0cHV0OiBodG1sX25vdGVib29rCi0tLQoKCmBgYHtyIHNldHVwfQprbml0cjo6b3B0c19jaHVuayRzZXQod2FybmluZyA9IEZBTFNFLCBtZXNzYWdlID0gRkFMU0UpCgpzb3VyY2UoJ3V0aWxzLlInKQpgYGAKCgpgYGB7cn0KcGxvdF9kaXN0YW5jZV9OKGRmX2RpbSx0ID0gNTAwMCxmX2VtcHR5X3RvcGljcyA9IFRSVUUsY29tcGFyaXNvbl9ncm91cCA9ICdwYWlycycsZGlzdGFuY2VfZm9ybXVsYSA9ICdjb3NpbmUnLCBwbG90bHkgPSBUUlVFKQpwbG90X2Rpc3RhbmNlX04oZGZfZGltLHQgPSA1MDAwLGZfZW1wdHlfdG9waWNzID0gVFJVRSxjb21wYXJpc29uX2dyb3VwID0gJ3BhaXJzJyxkaXN0YW5jZV9mb3JtdWxhID0gJ2t1bGxiYWNrLWxlaWJsZXInLCBwbG90bHkgPSBUUlVFKQpwbG90X2Rpc3RhbmNlX04oZGZfZGltLHQgPSA1MDAwLGZfZW1wdHlfdG9waWNzID0gVFJVRSxjb21wYXJpc29uX2dyb3VwID0gJ2RpZmYnLGRpc3RhbmNlX2Zvcm11bGEgPSAnY29zaW5lJywgcGxvdGx5ID0gVFJVRSkKcGxvdF9kaXN0YW5jZV9OKGRmX2RpbSx0ID0gNTAwMCxmX2VtcHR5X3RvcGljcyA9IFRSVUUsY29tcGFyaXNvbl9ncm91cCA9ICdkaWZmJyxkaXN0YW5jZV9mb3JtdWxhID0gJ2t1bGxiYWNrLWxlaWJsZXInLCBwbG90bHkgPSBUUlVFKQpgYGAKCgpgYGB7cn0KcGxvdF9kaXN0YW5jZV9wcm9wKGRmX2RpbSx0ID0gNTAwMCxmX2VtcHR5X3RvcGljcyA9IFRSVUUsZGlzdGFuY2VfZm9ybXVsYSA9ICdrdWxsYmFjay1sZWlibGVyJywgcGxvdGx5ID0gVFJVRSwKICAgICAgICAgICAgICAgICAgIHJlZ2lvbnMgPSBGQUxTRSkKYGBgCgo=